(frame-update-face-colors): Call frame-set-background-mode.

diff --git a/lisp/faces.el b/lisp/faces.el
index 2e3529fabf36458b2acd6790a03dd39d1d61e060..ad394fb8e01270266fb8d30c1c9959bcd9785e90 100644 (file)
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -1474,6 +1474,7 @@ examine the brightness for you."
 ;; This applies only to faces with global color specifications
 ;; that are not simple constants.
 (defun frame-update-face-colors (frame)
+  (frame-set-background-mode frame)
   (let ((faces global-face-data))
     (while faces
       (condition-case nil